home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Belgian Amiga Club - ADF Collection
/
BS1 part 71.zip
/
BS1 part 71
/
AmosPro2.0_d5.adf
/
Extensions
/
|Cequ.s
< prev
next >
Wrap
Text File
|
1992-09-28
|
3KB
|
134 lines
;---------------------------------------------------------------------
; *** *** ** ** **** **** ** ** ** ** ** *** ***
; ** ** ** *** *** ** ** ** ** ** **** *** *** ** ** **
; ** ** ** ** * ** ** ** ** ** ** ** ** ** * ** ** ** ***
; ** ** ** ** ** **** ** ** ****** ** ** ** ** **
; ** ** ** ** ** ** ** ** ** ** ** ** ** ** * **
; *** *** ** ** ** **** **** ** ** ** ** *** ***
;---------------------------------------------------------------------
; EQUATES
;---------------------------------------------------------------------
C_Code1 equ $FE
C_Code2 equ $01
C_CodeD equ $6543
C_CodeJ equ $F7
CiJSR equ $4EB9
CiJMP equ $4EF9
CodeR equ $8F
Rjmp MACRO
dc.b C_Code1,0*16+C_Code2
dc.b C_CodeJ,0
dc.w \1
ENDM
Rjsr MACRO
dc.b C_Code1,1*16+C_Code2
dc.b C_CodeJ,0
dc.w \1
ENDM
Ljmp MACRO
dc.b C_Code1,0*16+C_Code2
dc.b C_CodeJ,\2
dc.w \1
ENDM
Ljsr MACRO
dc.b C_Code1,1*16+C_Code2
dc.b C_CodeJ,\2
dc.w \1
ENDM
Rbra MACRO
dc.b C_Code1,2*16+C_Code2
dc.w \1
ENDM
Rbsr MACRO
dc.b C_Code1,3*16+C_Code2
dc.w \1
ENDM
Rbeq MACRO
dc.b C_Code1,4*16+C_Code2
dc.w \1
ENDM
Rbne MACRO
dc.b C_Code1,5*16+C_Code2
dc.w \1
ENDM
Rbcs MACRO
dc.b C_Code1,6*16+C_Code2
dc.w \1
ENDM
Rbcc MACRO
dc.b C_Code1,7*16+C_Code2
dc.w \1
ENDM
Rblt MACRO
dc.b C_Code1,8*16+C_Code2
dc.w \1
ENDM
Rbge MACRO
dc.b C_Code1,9*16+C_Code2
dc.w \1
ENDM
Rbls MACRO
dc.b C_Code1,10*16+C_Code2
dc.w \1
ENDM
Rbhi MACRO
dc.b C_Code1,11*16+C_Code2
dc.w \1
ENDM
Rble MACRO
dc.b C_Code1,12*16+C_Code2
dc.w \1
ENDM
Rbpl MACRO
dc.b C_Code1,13*16+C_Code2
dc.w \1
ENDM
Rbmi MACRO
dc.b C_Code1,14*16+C_Code2
dc.w \1
ENDM
Rdata MACRO
dc.b C_Code1,15*16+C_Code2
dc.w C_CodeD
ENDM
Rlea MACRO
lea \1,\2
ENDM
;Alea MACRO
; move.l a5,\2
; add.w A\1(a5),\2
; ENDM
*
GfxC MACRO
movem.l d0-d7/a0-a6,-(sp)
move.l T_GfxBase(a5),a6
jsr \1(a6)
movem.l (sp)+,d0-d7/a0-a6
ENDM
*
BitLib equ 31
BitChaine equ 30
BitLabel equ 29
*
Hunk_Public equ 0
Hunk_Chip equ $40000000
N_HunkSys equ 8
NH_Header equ 0
NH_Prog equ 1
NH_Reloc equ 2
NH_W.Lib equ 3
NH_Env equ 4
NH_Mouse equ 5
NH_Font equ 6
NH_Key equ 7
*
FlagFloat equ EdMarks+4*4
AForNext equ EdMarks+5*4
Ad_Labels equ EdMarks+6*4
Num_Proc equ EdMarks+7*4
LowPile equ EdMarks+8*4
LowPileP equ EdMarks+9*4
*
;---------------------------------------------------------------------